function sta_summary()
global CONTROL
sfm = getmainselection;
if(sfm > 0) 
   pflag = getplotflag;
   QueMessage('STA analysis summary', 1); % clear the que
   fprintf(1, '\n\nfile\trecbeg\tmeanfsl\tstdfsl\tmslope\tstdslope\tmvar\tmspamp\tmeanfsl2\tstdfsl2\tmslope2\tstdslope2\tmvar2\tspamp2\n');
   for i = 1:2:length(sfm)
      
      sf=sfm(i);
      [mfsl, vfsl] = mean_var(CONTROL(sf).spike.fsl);
      [mslope, vslope] = mean_var(CONTROL(sf).spike.pre_slope);
      [mvar, vvar] = mean_var(CONTROL(sf).spike.pre_var);
      [mspamp, vspamp] = mean_var(CONTROL(sf).spike.pre_specamp);
      
      fprintf(1, '%s\t%4d\t%6.2f\t%6.2f\t%6.3f\t%6.3f\t%6.3f\t%6.3f', ...
         CONTROL(sf).filename, CONTROL(sf).recbeg, mfsl, sqrt(vfsl), mslope, vslope, mvar, mspamp);
      sf=sfm(i+1);
      [mfsl, vfsl] = mean_var(CONTROL(sf).spike.fsl);
      [mslope, vslope] = mean_var(CONTROL(sf).spike.pre_slope);
      [mvar, vvar] = mean_var(CONTROL(sf).spike.pre_var);
      [mspamp, vspamp] = mean_var(CONTROL(sf).spike.pre_specamp);
         
         fprintf(1, '\t%6.2f\t%6.2f\t%6.3f\t%6.3f\t%6.3f\t%6.3f\n', ...
         mfsl, sqrt(vfsl), mslope, vslope, mvar,mspamp);
      
   end;
end;
